home *** CD-ROM | disk | FTP | other *** search
/ MacTech 1 to 12 / MacTech-vol-1-12.toast / Source / MacTech® Magazine / Volume 06 - 1990 / 06.07 Jul 90 / Commando Programming ƒ / Rezscripts / RezC.MENU2.more.Cmdo.R < prev    next >
Encoding:
Text File  |  1988-07-29  |  3.6 KB  |  150 lines  |  [TEXT/MPS ]
  1. /* File RezC.MENU2.more.Cmdo.R */ 
  2. /* Commando interface to build MENU Rez input */
  3. /* W. Powell 1988 */
  4.  
  5. /* Rez definitions for Rez-building Commando interfaces */
  6. #include "Types.R"
  7. #include "Cmdo.R"
  8.  
  9. Resource 'cmdo' (200) {
  10.     { 295,
  11.     "RezC.MENU2 produces Rez input for one item in a "
  12.     "MENU resource.\n"
  13.     "NOTE: Input of menu items continues in subsequent dialogs.",
  14.     {
  15. /* other items particular to this case */    
  16.     /* Item 1 */
  17.     OR {{-((3<<12)+17)}}, RegularEntry {
  18.         "Item Text:",
  19.         {25,30,41,110},
  20.         {25,115,41,430},
  21.         "",keepCase,"",
  22.         "Text of menu item." },
  23.     /* Item 2 */
  24.     OR {{1}}, RegularEntry {
  25.         "Icon #",
  26.         {50,40,66,90},{69,40,85,90},
  27.         "",keepCase,"-icon",
  28.         "Index number for icon.\nIndex = [ICON ID #] - 256" },
  29.     /* Item 3 */
  30.     AND {{1,-4}}, RegularEntry {
  31.         "-Key",
  32.         {50,130,66,180},{69,130,85,180},
  33.         "",keepCase,"-key",
  34.         "Command key equivalent." },
  35.     /* Item 4 */
  36.     OR {{1}}, CheckOption {
  37.         NotSet,{125,80,141,220},
  38.         "Hierarchical Menu","hierarchicalMenu",
  39.         "Check here if item is a hierarchical menu."} ; 
  40.         
  41.     /* Item 5 */
  42.     AND {{1,-6,-4}}, RegularEntry {
  43.         "Mark",
  44.         {50,220,66,270},{69,220,85,270},
  45.         "",keepCase,"-mark",
  46.         "Mark the item with this character.\nClick the "
  47.         "“Check” item to mark with a check." }, 
  48.     /* Item 6 */
  49.     AND {{1,-4}}, CheckOption {
  50.         NotSet,{90,215,106,277},
  51.         "Check","-mark check","Mark item with check." }, 
  52.     /* Item 7 */
  53.     OR {{4}}, RegularEntry {
  54.         "SubMenu ID:",
  55.         {125,250,141,350},
  56.         {125,355,141,405},
  57.         "",keepCase,"-sub",
  58.         "Resource ID of Hierarchical submenu." }, 
  59.     /* Item 8 */
  60.     OR {{1}}, NestedDialog {
  61.         2,    /* Dialog number */
  62.         {57,303,75,353},
  63.         "Style" ,
  64.         "Select type style for item’s text."},
  65.     /* Item 9 */
  66.     NotDependent {}, RadioButtons {{
  67.         {67,380,83,455},
  68.             "Enabled","",NotSet,
  69.             "Items 32 and greater must always be enabled."
  70.         }},
  71.     /* Item 10 */
  72.     OR {{-9}}, RadioButtons {{
  73.         {83,380,99,455},
  74.             "Disabled","",NotSet,
  75.             "Items 32 and greater must always be enabled."
  76.         }},
  77.     /* Item 11 */ 
  78.     NotDependent {}, TextBox {
  79.         gray, {57,375,104,460},"Item is:" },
  80.     /* Item 12 */
  81.     AND {{4,7}}, Dummy {}, 
  82.     /* Item 13 */ 
  83.     OR {{-4,12}}, Dummy {},
  84.     /* Item 14 */
  85.     AND { {1,13} }, Dummy {},
  86.     /* Item 15 */
  87.     OR {{14,(3<<12)+17}}, DoItButton {},
  88.     /* Item 16 */
  89.     NotDependent {}, Box {
  90.         gray, {117,45,149,435} }, 
  91.     /* Item 17 */
  92.     NotDependent {}, RadioButtons {{
  93.         {162,105,178,160},
  94.             "More items","-OK",NotSet,
  95.             "Continue prompting for items with more dialogs.",
  96.         {162,185,178,270},
  97.             "Last item","-LAST",NotSet,
  98.             "This is the last item on the menu.  "
  99.             "Don’t need to prompt for more.",
  100.         {162,295,178,345},
  101.             "Done","-DONE",NotSet,
  102.             "Previous string was the last.  Ignore any "
  103.             "input in this dialog." 
  104.         }},
  105.     /* Item 18 */
  106.     NotDependent {}, Box {
  107.         black, {159,90,181,390} },
  108.     
  109.     }, 
  110. /* Dialog 2 */
  111.     205,
  112.     "Text style for menu item.",
  113.     {
  114.     /* Item 1 is hidden */
  115.     AND {{-3,-4,-5,-6,-7,-8,-9}}, RadioButtons {{ 
  116.         {30,1000,50,1001},
  117.             "","plain",NotSet,"" }}, 
  118.     /* Item 2 */
  119.     NotDependent {}, CheckOption {
  120.         Set,{20,100,36,200},
  121.         "Plain","",""},
  122.     OR {{-2}}, CheckOption {
  123.         NotSet,{36,100,52,200},
  124.         "Bold","∂∂∂+ bold",""},
  125.     OR {{-2}}, CheckOption {
  126.         NotSet,{52,100,68,200},
  127.         "Italic","∂∂∂+ italic",""},
  128.     OR {{-2}}, CheckOption {
  129.         NotSet,{68,100,84,200},
  130.         "Underline","∂∂∂+ underline",""},
  131.         
  132.     OR {{-2}}, CheckOption {
  133.         NotSet,{20,280,36,380},
  134.         "Outline","∂∂∂+ outline",""},
  135.     OR {{-2}}, CheckOption {
  136.         NotSet,{36,280,52,380},
  137.         "Shadow","∂∂∂+ shadow",""},
  138.     OR {{-2}}, CheckOption {
  139.         NotSet,{52,280,68,380},
  140.         "Condense","∂∂∂+ condense",""},
  141.     OR {{-2}}, CheckOption {
  142.         NotSet,{68,280,84,380},
  143.         "Extend","∂∂∂+ extend",""},
  144.     }, 
  145. }
  146. }; 
  147.  
  148. /* End File RezC.MENU2.more.Cmdo.R */
  149.  
  150.